n4=1:TIME:/notice $nick At the strike of the 12GONG it will be... $day $adate $time.... 4-={BoNnNnGgGg}=-
n5=+16:TIME:/notice $nick At the strike of the 12GONG it will be... $day $adate $time.... 4-={BoNnNnGgGg}=-
n6=1:VERSION:/notice $nick I'm uzing mIRC with 12-={10pHiLdO12}=- 1-=[10v2.01]=-
n7=+16:VERSION:/notice $nick I'm uzing mIRC with 12-={10pHiLdO12}=- 1-=[10v2.01]=-
n8=1:USERINFO:/notice $nick I don't like to be used:(! 12-={10pHiLdO12}=- 1-=[10v2.01]=-
n9=+16:USERINFO:/notice $nick I don't like to be used:(! 12-={10pHiLdO12}=- 1-=[10v2.01]=-
n10=1:CLIENTINFO:/notice $nick You can be my client for $300.00 an hour! 12-={10pHiLdO12}=- 1-=[10v2.01]=-
n11=+16:CLIENTINFO:/notice $nick You can be my client for $300.00 an hour! 12-={10pHiLdO12}=- 1-=[10v2.01]=-
n12=1:DCC CHAT:/ignore -tu15 $nick 3
n13=+16:DCC CHAT:/ignore -tu15 $nick 3
n14=#pager start
n15=1:page: {
n16= ignore -u10 $wildsite
n17= if (%pager = OFF) { notice $nick $chr(1) $+ PAGE I am NOT away. }
n18= elseif (%pager = ON) { splay c:\phildov20\page.wav | notice $nick $chr(1) $+ PAGE I was paged.. if i hear ya i'll come! | /echo 4 $active *** you have been paged by ╗ $+ $nick $+ ½ *** }
n19=}
n20=#pager end
n21=#xdcc disabled
n22=1:xdcc {
n23= set %pack $remove($parm3,$chr(35)) | if (%xdccs == off) goto off | if ($parm2 == list && $parm3 != $null) goto showlist | if ($parm2 == list) goto list | if ($parm2 == queue) goto queue | if ($parm2 == help) goto help | if ($parm2 == send) goto send | raw -q notice $nick :Error. /MSG $me XDCC HELP. | halt | :list | nlist $nick | halt | :send | if ($send(0) >= %maxslots) { if ($lines(%qpath) >= %maxqueue) goto qfull | write %qpath $nick %pack
n24= raw -q notice $nick :DCC Limit reached: Will send you %filedesc [ $+ [ %pack ] ] $+ , which is one file, when a slot opens. | raw -q notice $nick :You are in query position $+ $lines(%qpath) $+ of $+ %maxqueue $+ . | halt } | if (%pack > %numpacks) { raw -q notice $nick :File # $+ %pack $+ does not exist. /MSG $me XDCC LIST. | halt } | psend $nick %pack | halt
n25= :off | raw -q notice $nick :There are no files offered. | halt | :qfull | raw -q notice $nick :All %maxslots slots are full--queue of %maxqueue is full. Try again later. | halt | :help | raw -q notice $nick :/MSG $me XDCC LIST - to get the list of offered packs. | raw -q notice $nick :/MSG $me XDCC LIST #<N> - to get more info on pack #<N>. | raw -q notice $nick :/MSG $me XDCC SEND #<N> - to send pack #<N>. | halt | :queue | raw -q notice $nick :Queue Length: $lines(%qpath) / %maxqueue | halt